home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / cutf / asm / sakick2.hd6 < prev    next >
Text File  |  1993-07-08  |  2KB  |  147 lines

  1. ds_name        db    'MOZCF\SAKICK',0
  2.  
  3. look_me:
  4.      call sub_esi
  5.      dd  0,0
  6.      dw  1,0           ; wind need
  7.      dw  649,379,0,50 ; sz_x sz_y off x  off y
  8.      dw  0,0          ; waku iro  meniro 
  9.      dw  0,0
  10.  
  11. paint_wd:
  12.      SET_P ndkan
  13.  
  14.      SET_P nddak
  15.      SET_P d_ura
  16.  
  17.      WD_LEFT
  18.      ret
  19.  
  20. re_paint:
  21.      ret
  22. mouse_in:
  23.      ret
  24. d_ura:
  25.     call sub_edi
  26.     dw 0
  27.     db 'URA',0
  28.  
  29. be_called:
  30.  
  31.     KAKU word ptr 300,1000
  32.     CALL_P d_ura
  33.  
  34.         call mozidt_d
  35.         KAKU 384,edi
  36.         CALL_P nddak
  37.         YOMU ax,382
  38.         cmp ax,1
  39.         je dirok
  40.         cmp ax,3
  41.         je be_called
  42.  
  43. dirchg:
  44.      MOZI mozi_dir
  45.      CALL_P ndkan
  46.  
  47.      cmp edx,0     ; not dir
  48. ;     jne dirnot
  49.      jne be_called
  50.  
  51.      YOMU dx,300     ; cancel
  52.      cmp dx,0
  53.      jne be_called
  54.  
  55.  
  56.      YOMU edx,304
  57.      YOMU edi,404     ; f_name2     xxdr_name
  58. ;     call dr_name     ; edi
  59. drin0:
  60.      mov al,[edx]
  61.      mov [edi],al
  62.      inc edi
  63.      inc edx
  64.      cmp al,0
  65.      jne drin0
  66.  
  67.      sub edi,2
  68.  
  69. drin22:
  70.      YOMU edx,408
  71. ;     call f_namef
  72. drin23:
  73.      mov al,[edx]
  74.      mov [edi],al
  75.      inc edx
  76.      inc edi
  77.      cmp al,0
  78.      jne drin23
  79.  
  80.      WD_ERZ 0
  81.      ret
  82.  
  83.  
  84. ;dirnot:
  85. ;
  86. ;     YOMU edx,304
  87. ;     YOMU edi,404     ; f_name2   xxdr_name
  88. ;     jmp dirok0
  89.  
  90.  
  91.  
  92.  
  93. dirok:
  94.      YOMU edx,400     ; f_name1
  95.      YOMU edi,404     ; f_name2   xxdir_name
  96. dirok0:
  97.      mov al,[edx]
  98.      mov [edi],al
  99.      inc edx
  100.      inc edi
  101.      cmp al,0
  102.      jne dirok0
  103.  
  104. dirok1:
  105.      dec edi
  106.      mov al,[edi]
  107.      cmp al,'\'
  108.      jne dirok1
  109.  
  110.      jmp drin22
  111.  
  112.  
  113.  
  114.  
  115. p_call:
  116.      M_P_CALL
  117. p_set:
  118.      M_P_SET
  119.  
  120. ndkan:
  121.      call sub_edi
  122.      dw     ?
  123.      db 'KANU',0
  124.  
  125. nddak:
  126.      call sub_edi
  127.      dw     ?
  128.      db 'DAKUHI2',0
  129.  
  130. mozidt_d:
  131.      call sub_edi
  132.      db '分割FILEは同じディレクトリ',0
  133.      db ' OK 変える  ',0
  134.  
  135.  
  136. mozi_dir:
  137.      call sub_edi
  138.        dw    0,15,200,80,0,20,8
  139.      db '分割されたファイルを複写するディレクトリを',0
  140.      db '選んでください',0
  141.      db ' ',0
  142.      db '方法は',0
  143.      db ' 1.  <.>を押してから、下で決定',0
  144.      db ' 2. ファイル名がないところを押してから下で決定',0
  145.      db ' 3. 一度外に出て入り直してから下で決定',0
  146.      db 'いずれも<*.*>で決定です',0
  147.